CAAEaster_Calculate <-
function(nYear, GregorianCalendar){
.Call("CAAEaster_Calculate", nYear, GregorianCalendar)
}
